Usenet 1993 July/InfoMagic USENET CD-ROM July 1993.ISO/sources/misc/volume17/calentool/part23

Internet Message Format | 1991-04-07 | 25.7 KB

From: [e-mail] (Bill Randle)
Newsgroups: comp.sources.misc
Subject: v17i104:  calentool - day/week/month/year-at-a-glance SunView tool, Part23/23
Message-ID: <[e-mail]>
Date: 7 Apr 91 01:00:25 GMT
Approved: [e-mail]
X-Checksum-Snefru: c7012728 333caa18 c16ae6d3 bc976593

Submitted-by: Bill Randle <[e-mail]>
Posting-number: Volume 17, Issue 104
Archive-name: calentool/part23

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#        "End of archive 23 (of 23)."
# Contents:  Bugs CalenTool.d Fixes1_2 Fixes1_4 ToDo calencheck.1
#   dates/README dates/ancient dates/can_holiday dates/lives
#   dates/lotr day.cursor month.h moon.icon riseset.h year.cursor
# Wrapped by billr@saab on Thu Mar 28 08:38:35 1991
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'Bugs' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'Bugs'\"
else
echo shar: Extracting \"'Bugs'\" \(1298 characters\)
sed "s/^X//" >'Bugs' <<'END_OF_FILE'
XThis isn't major, but I haven't been able to track it down...
X
X1) The "Working!" message occasionally lingers on when it shouldn't.
X   If it bothers you, don't use this option (-w).
X
X2) If the wpaint.c file is compiled with optimization then the display
X   does not get properly refreshed. If an explicit WIN_REPAINT is
X   inserted in the code or if optimiztion is not used for this file
X   then it all works OK.
X
XThe following bugs have been reported by various users, but I haven't
Xbeen able to fix them, since I haven't been able to duplicate them
X(usually due to hardware/os combinations I don't have access to).
X
X*Memory leakage <vicorp!sparky![e-mail]>
X*Popup error window only gets partially displayed (OS 4.0.3/Sun3) <[e-mail]>
X*Running calentool forces icon gravity change on 386i <[e-mail]>
X*Running calentool forces icon gravity change on SparcStation <[e-mail]>
X--The above two bugs are not true gravity changes, rather calentool was
X  reserving 10 icon slots on the desktop, forcing things to "wrap". In
X  this version it has been reduced to 5, though I still don't understand
X  why it uses more than 1.
X
X
XIf you fix any of these, or spot other bugs, please let me know.
X
X        Bill Randle
X        [e-mail]
X        March 25, 1991
END_OF_FILE
if test 1298 -ne `wc -c <'Bugs'`; then
    echo shar: \"'Bugs'\" unpacked with wrong size!
fi
# end of 'Bugs'
fi
if test -f 'CalenTool.d' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'CalenTool.d'\"
else
echo shar: Extracting \"'CalenTool.d'\" \(708 characters\)
sed "s/^X//" >'CalenTool.d' <<'END_OF_FILE'
XSunDefaults_Version 2
X; $Header: CalenTool.d,v 2.1 89/05/09 14:29:05 billr Exp $
X; defaults for calentool program
X; this can be put in /usr/lib/defaults or appended to ~/.defaults
X/CalenTool
X    $Help    "Day-Week-Month-Year-at-a-glance calendar and almanac"
X//Font        "screen.r.14"
X    $Help    "Font to use for standard numbers/letters"
X//BigFont    "gallant.r.10"
X    $Help    "Font to use for title strings"
X//Printer    "lw"
X    $Help    "Postscript (or Raster) printer"
X//LibDir    "/usr/local/lib/calentool"
X    $Help    "Directory for standard date/event files"
X; This entry may be useful where all appointment files are in a
X; common NFS'd directory
X;//Appts    "/usr/local/lib/calendars/billr.appts"
X;    $Help    "File to use for my appointments"
END_OF_FILE
if test 708 -ne `wc -c <'CalenTool.d'`; then
    echo shar: \"'CalenTool.d'\" unpacked with wrong size!
fi
# end of 'CalenTool.d'
fi
if test -f 'Fixes1_2' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'Fixes1_2'\"
else
echo shar: Extracting \"'Fixes1_2'\" \(486 characters\)
sed "s/^X//" >'Fixes1_2' <<'END_OF_FILE'
X# $Header: Fixes1_2,v 1.1 88/04/08 11:27:56 billr Exp $
X
XLate flash for version 1.2 of calentool:
X
X1) Removed the remaining hard-coded usage of year strings.  The tool
X   now works for any period of years starting at or after 1985 and
X   ending on or before 1999.  More work would have to be done to
X   get it to work beyond the year 2000.
X
X2) Calentool now understands leap years!  Previous versions always
X   assumed February had 28 days.
X
X    -Bill Randle
X    [e-mail]
X    2/2/88
END_OF_FILE
if test 486 -ne `wc -c <'Fixes1_2'`; then
    echo shar: \"'Fixes1_2'\" unpacked with wrong size!
fi
# end of 'Fixes1_2'
fi
if test -f 'Fixes1_4' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'Fixes1_4'\"
else
echo shar: Extracting \"'Fixes1_4'\" \(1147 characters\)
sed "s/^X//" >'Fixes1_4' <<'END_OF_FILE'
X# $Header: Fixes1_4,v 1.1 88/04/08 11:28:00 billr Exp $
X
XVersion 1.4 update:
X
X1) Add code to include a "Done" button on the selection window to
X   display todays appointments then close to an icon. This is faster
X   than selecting "Today", then selecting "close" out of the suntools
X   window menu. This is especially handy for the reminder service
X   (see below).
X
X2) Add a new reminder feature. The icon will be displayed in reverse
X   video starting approximately ten minutes prior to an appointment
X   and all during an appointment. When the appointment is over, the
X   icon switches back to normal. This is really handy if, like me,
X   you normally keep calentool in the iconic state and need some
X   help remembering when to get ready for that next meeting.
X   (Thanks to Dan Heller and "mushtool" for hints on how to do this.)
X
X3) A third icon is displayed if there are no appointments or notes
X   left for today. This icon is similar to the standard icon except
X   no lines are displayed and the words "No Appts" displayed instead.
X
X4) The rings on the icons were shortened by two pixels to "improve" the
X   looks.
X
X    -Bill Randle
X    2/19/88
END_OF_FILE
if test 1147 -ne `wc -c <'Fixes1_4'`; then
    echo shar: \"'Fixes1_4'\" unpacked with wrong size!
fi
# end of 'Fixes1_4'
fi
if test -f 'ToDo' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'ToDo'\"
else
echo shar: Extracting \"'ToDo'\" \(1895 characters\)
sed "s/^X//" >'ToDo' <<'END_OF_FILE'
XStill to do someday...
X
X1) Add Lunar based (e.g. Chinese, Japanese) holidays.
X
X2) Add calculations for more astronomical events.
X
X3) Convert display canvas to scrollable canvas
X
X4) Extend next and previous menus.
X
X2, 3 and 4, at least, will be in version 3.0 which will a ground up
Xrewrite.
X
XThe following feature enhancements have been suggested by various
Xusers. Some of these may appear in version 3.0, some may not. Feel
Xfree to send me your suggestions, or to vote on the ones listed
Xhere.
X
X=Add menu to Filename: option, add flags to #include directive to
X indicate a)if name should appear in Filename: menu, b) read/write
X default, c) string to appear in Filename: menu; <[e-mail]>
X=Want Next and Previous menus to display multiple date selections
X=Want easy switch between different users appts <[e-mail]>
X=Want range of dates for printing <[e-mail]>
X=Want to be able to set START_HOUR > END_HOUR <[e-mail]>
X=Want to come up in week display <[e-mail]>
X=Want to order the notes (i.e. pick which is displayed first) <[e-mail]>
X=Want to see two days at a time <[e-mail]>
X=Want to start arbitrary process at appt time <[e-mail]>
X=Want week display to show current day at left, then next 5-7 days <[e-mail]>
X=Want jump scroll for long messages
X=Want more features from 'sched', e.g. alarm clock, marked time events, display month current month icon <[e-mail]>
X=Want to be able to set all command line options from within the running tool.
X=Want to be able to expire appts on a per appt basis <[e-mail]>
X=Want to be able to specify a "nearest Monday" for holidays <[e-mail]>
X=Want each appt to display in its own popup window when ready <[e-mail]>
X=Want option to only display non-repeating appts (esp. on month) <execu!sequoia!unisql![e-mail]>
END_OF_FILE
if test 1895 -ne `wc -c <'ToDo'`; then
    echo shar: \"'ToDo'\" unpacked with wrong size!
fi
# end of 'ToDo'
fi
if test -f 'calencheck.1' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'calencheck.1'\"
else
echo shar: Extracting \"'calencheck.1'\" \(1124 characters\)
sed "s/^X//" >'calencheck.1' <<'END_OF_FILE'
X.\" $Header: calencheck.1,v 2.1 89/12/15 17:04:56 billr Exp $
X.\"
X.TH CALENCHECK 1 "14 December 1989"
X.SH NAME
Xcalencheck - check for pending appointments
X.SH SYNOPSIS
X.B calencheck
X[
X.B \-f
X.I apptsfile
X]
X.SH DESCRIPTION
X.I Calencheck
Xis a companion program for
X.IR calentool (1L).
X.I Calencheck
Xreads the
X.I calentool
X.B .appointments
Xfile and sends a message to the console approximately ten minutes
Xbefore a scheduled appointment is to start.  Its operation is
Xthe same as invoking
X.I calentool
Xwith the
X.B \-b
Xoption, with the exception that there is no icon to change.
X.LP
XThis program is especially useful for Sun systems with limited
Xmemory or swap space that can not afford to keep
X.I calentool
Xrunning continously.
XIt may also be useful if the user is not working at his/her console,
Xas it does not require the window system to work.
X.LP
XTo enter or edit appointments the
X.I calentool
Xprogram must still be used.
X.SH OPTIONS
X.TP 15
X.BI \-f \ apptsfile
XUse
X.I apptsfile
Xas the appointments file, rather than the default.
X.SH "SEE ALSO"
Xcalentool(1L)
X.SH AUTHOR
XBill Randle (Tektronix, Inc., [e-mail])
END_OF_FILE
if test 1124 -ne `wc -c <'calencheck.1'`; then
    echo shar: \"'calencheck.1'\" unpacked with wrong size!
fi
# end of 'calencheck.1'
fi
if test -f 'dates/README' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dates/README'\"
else
echo shar: Extracting \"'dates/README'\" \(1018 characters\)
sed "s/^X//" >'dates/README' <<'END_OF_FILE'
X# $Header: README,v 2.2 91/03/04 11:35:46 billr Exp $
X
XThese date files were derived from USENET postings of special events.
XSee the CREDITS file for more details.
X
XAll dates in these files are New Style unless otherwise noted.
X
XTo use any of these files with the calentool program, add a line of the form:
X    #include "/somepath/file"
Xor
X    #include <file>
Xto your ".appointments" file.  The first method specifies the complete
Xpathname to the desired file.  The second prepends the file name with
Xa pathname determined from the CalenTool/LibDir entry in the suntools
Xdefaults file (first), or from the path specified by DATELIB_DIR
Xdefined in the Makefile or ct.h file (second).
X
XIf you add dates to these files, or create new ones, share your entries
Xwith the net by mailing a copy to me.  PLEASE be CERTAIN that you have the
Xcorrect rule for specifying the date before you do this; remember that
Xnot all holidays fall on the same Gregorian date each year!
X
X                Bill Randle
X                [e-mail]
X                March 4, 1991
END_OF_FILE
if test 1018 -ne `wc -c <'dates/README'`; then
    echo shar: \"'dates/README'\" unpacked with wrong size!
fi
# end of 'dates/README'
fi
if test -f 'dates/ancient' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dates/ancient'\"
else
echo shar: Extracting \"'dates/ancient'\" \(1179 characters\)
sed "s/^X//" >'dates/ancient' <<'END_OF_FILE'
X# CalenTool V2.2 - nflag=1 range=3,12 - DO NOT REMOVE THIS LINE
X# $Header: ancient,v 1.2 91/03/07 16:21:01 billr Exp $
X# Special celebrated in ancient times
X# Today in History dates provided by Robert Heckendorn at
X# Hewlett-Packard in Fort Collins, Colorado.
X# Any corrections or additions may be sent to [e-mail]
X#
X# Additional dates provided from ProLine's today file
X#
X# Converted to calentool format by Larry Virden ([e-mail])
X# and further edited and merged by Bill Randle ([e-mail]).
X#
X** 03 25 99 99 00 New Year's Day in England from the 12c. until 1752
X** 04 13 99 99 00 Roman feast of the Goddess Liberty
X** 04 29 99 99 00 Beginning of the festival of the goddess Flora in ancient Rome which is thought to be the origin of May Day
X** 04 30 99 99 00 Walpurgisnacht, Witch's sabbath is held in the Harz mountains of Germany, a time of great evil
X** 05 04 99 99 00 Last day of the Roman Floralia festival
X** 06 09 99 99 00 Vestalia, ancient Roman feast to the goddess Vesta, the virgin goddess of hearth and home
X** 06 10 99 99 00 Egyptian Day, considered unlucky in the Middle Ages
X** 12 17 99 99 00 Saturnalia revel
END_OF_FILE
if test 1179 -ne `wc -c <'dates/ancient'`; then
    echo shar: \"'dates/ancient'\" unpacked with wrong size!
fi
# end of 'dates/ancient'
fi
if test -f 'dates/can_holiday' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dates/can_holiday'\"
else
echo shar: Extracting \"'dates/can_holiday'\" \(963 characters\)
sed "s/^X//" >'dates/can_holiday' <<'END_OF_FILE'
X# CalenTool V2.2 - nflag=1 range=1,12 - DO NOT REMOVE THIS LINE
X# $Header: can_holiday,v 1.3 91/03/07 16:21:03 billr Exp $
X# Canadian holidays fixed by exact date or as nth mday of month
X# Modified from usa_holiday.
X# (This is a subset of the most common nationally observed dates)
X#
X** 01 01 99 99 00 New Year's Day
X** 05 Su 99 99 00 [2] Mother's Day
X** 05 Mo 99 99 00 [3] Victoria Day
X** 06 Su 99 99 00 [3] Father's Day
X** 06 24 99 99 00 St. Jean Baptiste Day
X# The Can. holiday is the following Monday if on a wknd.
X** 07 01 99 99 00 Canada Day
X# USA holiday; Canada is open but U.S. is closed.
X** 07 04 99 99 00 Independence Day - U.S.A. closed today.
X** 09 Mo 99 99 00 [1] Labor Day
X** 10 Mo 99 99 00 [2] Thanksgiving Day (Canada)
X** 11 11 99 99 00 Remembrance Day
X# USA holiday; Canada is open but U.S. is closed.
X** 11 Th 99 99 00 [4] Thanksgiving Day (United States)
X** 12 25 99 99 00 Christmas
X** 12 26 99 99 00 Bank Holiday
X** 12 26 99 99 00 Boxing Day
END_OF_FILE
if test 963 -ne `wc -c <'dates/can_holiday'`; then
    echo shar: \"'dates/can_holiday'\" unpacked with wrong size!
fi
# end of 'dates/can_holiday'
fi
if test -f 'dates/lives' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dates/lives'\"
else
echo shar: Extracting \"'dates/lives'\" \(280 characters\)
sed "s/^X//" >'dates/lives' <<'END_OF_FILE'
X# CalenTool V2.2 - nflag=1 range=1,12 - DO NOT REMOVE THIS LINE
X# $Header: lives,v 1.1 91/03/07 16:18:52 billr Exp $
X# Common include file just includes individual parts
X#
X#include <lives1>
X#include <lives2>
X#include <lives3>
X#include <lives4>
X#include <lives5>
X#include <lives6>
END_OF_FILE
if test 280 -ne `wc -c <'dates/lives'`; then
    echo shar: \"'dates/lives'\" unpacked with wrong size!
fi
# end of 'dates/lives'
fi
if test -f 'dates/lotr' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'dates/lotr'\"
else
echo shar: Extracting \"'dates/lotr'\" \(2172 characters\)
sed "s/^X//" >'dates/lotr' <<'END_OF_FILE'
X# CalenTool V2.2 - nflag=1 range=1,12 - DO NOT REMOVE THIS LINE
X# $Header: lotr,v 2.2 91/03/07 16:21:16 billr Exp $
X# Special days file for calentool (rel 2.1); modified from network posting by
X# RPC Rodgers, UCSF, Nov. 1988
X# Dates from "The Lord of the Rings" by J. R. R. Tolkien
X#
X** 01 05 99 99 00 Fellowship enters Moria (LOTR)
X** 01 09 99 99 00 Fellowship reaches Lorien (LOTR)
X** 01 17 99 99 00 Passing of Gandalf (LOTR)
X** 02 07 99 99 00 Fellowship leaves Lorien (LOTR)
X** 02 17 99 99 00 Death of Boromir (LOTR)
X** 02 20 99 99 00 Meriadoc & Pippin meet Treebeard (LOTR)
X** 02 22 99 99 00 Passing of King Ellesar (LOTR)
X** 02 24 99 99 00 Ents destroy Isengard (LOTR)
X** 02 26 99 99 00 Aragorn takes the Paths of the Dead (LOTR)
X** 03 05 99 99 00 Frodo & Samwise encounter Shelob (LOTR)
X** 03 08 99 99 00 Deaths of Denethor & Theoden (LOTR)
X** 03 18 99 99 00 Destruction of Ring (LOTR)
X** 03 29 99 99 00 Flowering of the Mallorn (LOTR)
X** 04 04 99 99 00 Gandalf visits Bilbo (LOTR)
X** 04 17 99 99 00 An unexpected party (LOTR)
X** 04 23 99 99 00 Crowning of King Ellesar (LOTR)
X** 05 19 99 99 00 Arwen leaves Lorian to wed King Ellesar (LOTR)
X** 06 11 99 99 00 Sauron attacks Osgilliath (LOTR)
X** 06 13 99 99 00 Bilbo returns to Bag End (LOTR)
X** 06 23 99 99 00 Wedding of Ellesar & Arwen (LOTR)
X** 07 04 99 99 00 Gandalf imprisoned by Suruman (LOTR)
X** 07 24 99 99 00 The ring comes to Bilbo (LOTR)
X** 07 26 99 99 00 Bilbo rescued from Wargs by Eagles (LOTR)
X** 08 03 99 99 00 Funeral of King Theoden (LOTR)
X** 08 29 99 99 00 Suruman enters Shire (LOTR)
X** 09 10 99 99 00 Gandalf escapes from Orthanc (LOTR)
X** 09 14 99 99 00 Frodo & Bilbo's birthday (LOTR)
X** 09 15 99 99 00 Black riders enter Shire (LOTR)
X** 09 18 99 99 00 Frodo & company rescued by Bombadil (LOTR)
X** 09 28 99 99 00 Frodo wounded at Weathertop (LOTR)
X** 10 05 99 99 00 Frodo crosses bridge of Mitheithel (LOTR)
X** 10 16 99 99 00 Boromir reaches Rivendell (LOTR)
X** 10 17 99 99 00 Council of Elrond (LOTR)
X** 10 25 99 99 00 End of War of the Ring (LOTR)
X** 11 16 99 99 00 Bilbo reaches Lonely Mountain (LOTR)
X** 12 05 99 99 00 Death of Sm8 (LOTR)
X** 12 16 99 99 00 Fellowship begins Quest (LOTR)
END_OF_FILE
if test 2172 -ne `wc -c <'dates/lotr'`; then
    echo shar: \"'dates/lotr'\" unpacked with wrong size!
fi
# end of 'dates/lotr'
fi
if test -f 'day.cursor' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'day.cursor'\"
else
echo shar: Extracting \"'day.cursor'\" \(283 characters\)
sed "s/^X//" >'day.cursor' <<'END_OF_FILE'
X/* $Header: day.cursor,v 2.1 89/05/09 14:31:03 billr Exp $ */
X/* Format_version=1, Width=16, Height=16, Depth=1, Valid_bits_per_item=16
X */
X        0x0000, 0x0000, 0x0000, 0x01F0, 0x0700, 0x1DFF, 0x7000, 0xC000,
X        0x7000, 0x1DFF, 0x0700, 0x01F0, 0x0000, 0x0000, 0x0000, 0x0000
END_OF_FILE
if test 283 -ne `wc -c <'day.cursor'`; then
    echo shar: \"'day.cursor'\" unpacked with wrong size!
fi
# end of 'day.cursor'
fi
if test -f 'month.h' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'month.h'\"
else
echo shar: Extracting \"'month.h'\" \(2119 characters\)
sed "s/^X//" >'month.h' <<'END_OF_FILE'
X/*
X * @(#)$ month.h,v 8.4 88/04/04 10:46:35 hull Exp $
X */
X/*
X * truncated from the original to only include what I need
X * and appended month8.h onto the end.
X *
X * Bill Randle 2/22/89
X */
X
X#define MAX_EVENT_STRING_LENGTH    70    /* maximum length of an event string */
X
X#define READ_WRITE    0        /* open .month with read/write access */
X#define READ_ONLY    1        /* open .month with read-only access */
X
Xextern char *malloc();
X
X/* structure of an area */
Xstruct area_rec {
X    short area;
X    short row;
X    short col;
X};
X
X/* structure of a date */
Xstruct date_rec {
X    short month;
X    short day;
X    short year;
X};
X
X/* structure of a time */
Xstruct time_rec {
X    short hour;
X    short minute;
X};
X
X/* structure of an event pointer */
Xstruct eptr_rec {
X    struct event_rec *event;    /* event */
X    struct eptr_rec *prev_event;    /* previous event */
X    struct eptr_rec *next_event;    /* next event */
X};
X
X/* structure of a name */
Xstruct name_rec {
X    char *name;            /* name */
X    struct name_rec *next_name    /* next name */
X};
X
X/*
X * @(#) month8.h,v 8.0 87/11/13 22:50:14 hull Exp
X */
X
X/* structure of an event */
Xstruct event_rec {
X    struct date_rec start_date;    /* starting date of the event */
X    char monthly;        /* does event occur monthly? */
X    char yearly;        /* does event occur yearly? */
X    char every;        /* does event occur on every something? */
X    char smtwtfs[7];    /* which days of the week are relevant? */
X    char nth;        /* does event occur on an nth something? */
X    char last;        /* does event occur on a last something? */
X    char nth_is_on;        /* is 'nth' selected by user, n is nth above */
X    struct time_rec start_time;    /* starting time of the event */
X    struct time_rec duration;    /* duration of the event */
X    struct time_rec warning;    /* warning of the event */
X    struct time_rec end_time;    /* ending time of the event */
X    char event_string[MAX_EVENT_STRING_LENGTH];  /* description of event */
X    char private;        /* is event private? */
X    char anti;        /* is this an anti-event? */
X    int event_owner;    /* owner of event */
X    char until;        /* does event occur until some date? */
X    struct date_rec until_date;    /* date event goes until */
X    struct event_rec *next_event;    /* next event */
X};
END_OF_FILE
if test 2119 -ne `wc -c <'month.h'`; then
    echo shar: \"'month.h'\" unpacked with wrong size!
fi
# end of 'month.h'
fi
if test -f 'moon.icon' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'moon.icon'\"
else
echo shar: Extracting \"'moon.icon'\" \(1991 characters\)
sed "s/^X//" >'moon.icon' <<'END_OF_FILE'
X/* Format_version=1, Width=64, Height=64, Depth=1, Valid_bits_per_item=16
X * $Header: moon.icon,v 2.1 89/12/15 17:04:59 billr Exp $
X */
X    0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
X    0xFFFF,0xFF00,0x00FF,0xFFFF,0xFFFF,0xF800,0x081F,0xFFFF,
X    0xFFFF,0xE041,0x2307,0xFFFF,0xFFFF,0x8008,0x2001,0xFFFF,
X    0xFFFF,0x08E2,0x0AB0,0xFFFF,0xFFFE,0x0384,0x40A8,0x7FFF,
X    0xFFF8,0x046C,0x228C,0x1FFF,0xFFF0,0x96D1,0x1B59,0x0FFF,
X    0xFFE0,0x3758,0x05C7,0x07FF,0xFFE4,0x05A1,0x20F1,0x47FF,
X    0xFFC0,0xAAD0,0xAF14,0xA3FF,0xFF82,0x4504,0x40E6,0x81FF,
X    0xFF09,0x9121,0x04B4,0x08FF,0xFF20,0x8D01,0x2050,0x20FF,
X    0xFE02,0x5A4A,0x0802,0x807F,0xFE28,0x8112,0x2099,0x127F,
X    0xFC05,0x464A,0x4A60,0x103F,0xFC54,0x4091,0x0044,0x423F,
X    0xFC68,0x25B4,0x4241,0x203F,0xF881,0x2260,0xBBB0,0x041F,
X    0xF828,0x410C,0x0408,0x201F,0xF900,0xF950,0xCCA6,0x891F,
X    0xF893,0x1400,0x3001,0x001F,0xF80A,0x2648,0x2A20,0x809F,
X    0xF893,0x0500,0x1008,0xC01F,0xF921,0x9820,0x1481,0x001F,
X    0xF810,0x7708,0x8802,0x491F,0xF8AD,0x0A80,0x461C,0x001F,
X    0xF86A,0x1040,0x12E1,0x001F,0xF895,0x9082,0x0000,0x011F,
X    0xF86A,0x0200,0x0000,0x001F,0xF90A,0x4800,0x0000,0x021F,
X    0xF855,0x0488,0x0002,0x701F,0xF830,0xA000,0x0409,0x881F,
X    0xFC09,0x4000,0x0002,0x083F,0xFC83,0x4A40,0x2004,0x293F,
X    0xFC04,0x3100,0x0084,0x503F,0xFE49,0x104F,0x8405,0x207F,
X    0xFE09,0x6830,0x4003,0xC07F,0xFF12,0x8560,0x1000,0x00FF,
X    0xFF08,0x5A80,0x0C00,0x10FF,0xFF8D,0x7302,0x1401,0x01FF,
X    0xFFC3,0xC907,0x8200,0x03FF,0xFFE2,0x830E,0x3404,0x07FF,
X    0xFFE0,0x5101,0x1400,0x47FF,0xFFF0,0x5092,0x6048,0x0FFF,
X    0xFFF8,0x00CE,0x8C02,0x1FFF,0xFFFE,0x0979,0xE100,0x7FFF,
X    0xFFFF,0x080E,0x1200,0xFFFF,0xFFFF,0x8102,0x4021,0xFFFF,
X    0xFFFF,0xE020,0x0907,0xFFFF,0xFFFF,0xF800,0x001F,0xFFFF,
X    0xFFFF,0xFF00,0x00FF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
X    0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
X    0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
X    0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,
X    0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF,0xFFFF
END_OF_FILE
if test 1991 -ne `wc -c <'moon.icon'`; then
    echo shar: \"'moon.icon'\" unpacked with wrong size!
fi
# end of 'moon.icon'
fi
if test -f 'riseset.h' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'riseset.h'\"
else
echo shar: Extracting \"'riseset.h'\" \(1351 characters\)
sed "s/^X//" >'riseset.h' <<'END_OF_FILE'
X/*
X * $Header: riseset.h,v 2.2 91/02/01 12:20:58 billr Exp $
X */
X/*
X * riseset.h
X *
X * Author: Bill Randle, Tektronix, Inc. <[e-mail]>
X *
X * Copyright (C) 1989, Tektronix, Inc.  All Rights Reserved
X *
X * Permission is hereby granted to use and modify this code in source
X * or binary form as long as it is not sold for profit and this copyright
X * notice remains intact.
X */
X
X/*
X * index into riseset_buf[]
X */
X#define    B_GMT    0    /* Greenwich Mean Time (GMT) (==UTC) */
X#define    B_TDT    1    /* Terrestrial Dynamical Time */
X#define    B_LCT    2    /* Local Civil Time */
X#define    B_LMT    3    /* Local Mean Time */
X#define    B_POM    4    /* Phase Of Moon */
X#define    B_JLD    5    /* Julian Day */
X#define    B_GST    6    /* Greenwich Mean Sideral Time */
X#define    B_LST    7    /* Local Sidereal Time */
X#define    B_LHA    8    /* L.H.A. of Sun */
X#define    B_SDE    9    /* Declination of Sun */
X#define    B_SAZ    10    /* Azimuth of Sun */
X#define    B_SEL    11    /* Elevation of Sun */
X#define    B_SRD    12    /* Sun Rise Today */
X#define    B_SSD    13    /* Sun Set Today */
X#define    B_SRT    14    /* Sun Rise Tomorrow */
X#define    B_SST    15    /* Sun Set Tomorrow */
X#define    B_MRD    16    /* Moon Rise Today */
X#define    B_MSD    17    /* Moon Set Today */
X#define    B_MRT    19    /* Moon Rise Tomorrow */
X#define    B_MST    20    /* Moon Set Tomorrow */
X#define B_DMY    21    /* Day-Month-Year */
X#define B_LOD    22    /* Length of Day (Sunlight) */
X
X#define B_SIZE    (B_LOD+1)
END_OF_FILE
if test 1351 -ne `wc -c <'riseset.h'`; then
    echo shar: \"'riseset.h'\" unpacked with wrong size!
fi
# end of 'riseset.h'
fi
if test -f 'year.cursor' -a "${1}" != "-c" ; then
  echo shar: Will not clobber existing file \"'year.cursor'\"
else
echo shar: Extracting \"'year.cursor'\" \(256 characters\)
sed "s/^X//" >'year.cursor' <<'END_OF_FILE'
X/* $Header: year.cursor,v 2.1 89/05/09 14:31:12 billr Exp $ */
X/* Format_version=1, Width=16, Height=16, Depth=1, Valid_bits_per_item=16
X */
X    0xFFFF,0xC003,0x8AA9,0x8001,0xFFFF,0xFFFF,0x9249,0xFFFF,
X    0x9249,0xFFFF,0x9249,0xFFFF,0x9249,0xFFFF,0x9249,0xFFFF
END_OF_FILE
if test 256 -ne `wc -c <'year.cursor'`; then
    echo shar: \"'year.cursor'\" unpacked with wrong size!
fi
# end of 'year.cursor'
fi
echo shar: End of archive 23 \(of 23\).
cp /dev/null ark23isdone
MISSING=""
for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 ; do
    if test ! -f ark${I}isdone ; then
    MISSING="${MISSING} ${I}"
    fi
done
if test "${MISSING}" = "" ; then
    echo You have unpacked all 23 archives.
    rm -f ark[1-9]isdone ark[1-9][0-9]isdone
else
    echo You still need to unpack the following archives:
    echo "        " ${MISSING}
fi
##  End of shell archive.
exit 0

exit 0 # Just in case...
--
Kent Landfield                   INTERNET: [e-mail]
Sterling Software, IMD           UUCP:     uunet!sparky!kent
Phone:    [phone]         FAX:      [phone]
Please send comp.sources.misc-related mail to [e-mail].